home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / djgpp / src / binutils.252 / gas / as.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-10-27  |  16.7 KB  |  615 lines
  1. /* as.h - global header file
  2.    Copyright (C) 1987, 1990, 1991, 1992 Free Software Foundation, Inc.
  3.  
  4.    This file is part of GAS, the GNU Assembler.
  5.  
  6.    GAS is free software; you can redistribute it and/or modify
  7.    it under the terms of the GNU General Public License as published by
  8.    the Free Software Foundation; either version 2, or (at your option)
  9.    any later version.
  10.  
  11.    GAS is distributed in the hope that it will be useful,
  12.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.    GNU General Public License for more details.
  15.  
  16.    You should have received a copy of the GNU General Public License
  17.    along with GAS; see the file COPYING.  If not, write to
  18.    the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  19.  
  20. #ifndef GAS
  21. #define GAS 1
  22. /*
  23.  * I think this stuff is largely out of date.  xoxorich.
  24.  *
  25.  * CAPITALISED names are #defined.
  26.  * "lowercaseH" is #defined if "lowercase.h" has been #include-d.
  27.  * "lowercaseT" is a typedef of "lowercase" objects.
  28.  * "lowercaseP" is type "pointer to object of type 'lowercase'".
  29.  * "lowercaseS" is typedef struct ... lowercaseS.
  30.  *
  31.  * #define DEBUG to enable all the "know" assertion tests.
  32.  * #define SUSPECT when debugging hash code.
  33.  * #define COMMON as "extern" for all modules except one, where you #define
  34.  *    COMMON as "".
  35.  * If TEST is #defined, then we are testing a module: #define COMMON as "".
  36.  */
  37.  
  38. #include "config.h"
  39.  
  40. /* This is the code recommended in the autoconf documentation, almost
  41.    verbatim.  If it doesn't work for you, let me know, and notify
  42.    djm@gnu.ai.mit.edu as well.  */
  43. /* Added #undef for DJ Delorie.  KR 1994.10.21 */
  44.  
  45. /* AIX requires this to be the first thing in the file.  */
  46. #ifdef __GNUC__
  47. # undef alloca
  48. # define alloca __builtin_alloca
  49. #else
  50. # if HAVE_ALLOCA_H
  51. #  include <alloca.h>
  52. # else
  53. #  ifdef _AIX
  54.  #pragma alloca
  55. #  else
  56. #   ifndef alloca /* predefined by HP cc +Olibcalls */
  57. char *alloca ();
  58. #   endif
  59. #  endif
  60. # endif
  61. #endif
  62.  
  63. /* Now, tend to the rest of the configuration.  */
  64.  
  65. /* System include files first... */
  66. #include <stdio.h>
  67. #include <ctype.h>
  68. #ifdef HAVE_STRING_H
  69. #include <string.h>
  70. #else
  71. #include <strings.h>
  72. #endif
  73. #ifdef HAVE_STDLIB_H
  74. #include <stdlib.h>
  75. #endif
  76. #ifdef HAVE_UNISTD_H
  77. #include <unistd.h>
  78. #endif
  79. #ifdef HAVE_SYS_TYPES_H
  80. /* for size_t, pid_t */
  81. #include <sys/types.h>
  82. #endif
  83.  
  84. /* Some systems do declare this, but this seems to be the universal
  85.    declaration, though the parameter type varies.  (It ought to use
  86.    `const' but many systems prototype it without.)  Include it here
  87.    for systems that don't declare it.  If conflicts arise, just add
  88.    another autoconf test...  */
  89. extern char *strdup (/* const char * */);
  90.  
  91. #include <getopt.h>
  92. /* The first getopt value for machine-independent long options.
  93.    150 isn't special; it's just an arbitrary non-ASCII char value.  */
  94. #define OPTION_STD_BASE 150
  95. /* The first getopt value for machine-dependent long options.
  96.    170 gives the standard options room to grow.  */
  97. #define OPTION_MD_BASE 170
  98.  
  99. #ifdef DEBUG
  100. #undef NDEBUG
  101. #endif
  102. /* Handle lossage with assert.h.  */
  103. #ifndef BROKEN_ASSERT
  104. #include <assert.h>
  105. #else /* BROKEN_ASSERT */
  106. #ifndef NDEBUG
  107. #define assert(p) ((p) ? 0 : (abort(), 0))
  108. #else
  109. #define assert(p) ((p), 0)
  110. #endif
  111. #endif /* BROKEN_ASSERT */
  112.  
  113.  
  114. /* Now GNU header files... */
  115. #include <ansidecl.h>
  116. #ifdef BFD_ASSEMBLER
  117. #include <bfd.h>
  118. #endif
  119.  
  120. /* This doesn't get taken care of anywhere.  */
  121. #if !defined (__GNUC__) && !defined (inline)
  122. #define inline
  123. #endif
  124.  
  125. /* Other stuff from config.h.  */
  126. #ifdef NEED_DECLARATION_MALLOC
  127. extern PTR malloc ();
  128. extern PTR realloc ();
  129. #endif
  130. #ifdef NEED_DECLARATION_FREE
  131. extern void free ();
  132. #endif
  133.  
  134. /* This is needed for VMS.  */
  135. #if ! defined (HAVE_UNLINK) && defined (HAVE_REMOVE)
  136. #define unlink remove
  137. #endif
  138.  
  139. #ifdef BFD_ASSEMBLER
  140. /* This one doesn't get declared, but we're using it anyways.  This
  141.    should be fixed -- either it's part of the external interface or
  142.    it's not.  */
  143. extern PTR bfd_alloc_by_size_t PARAMS ((bfd *abfd, size_t sz));
  144. #endif
  145.  
  146. /* Make Saber happier on obstack.h.  */
  147. #ifdef SABER
  148. #undef  __PTR_TO_INT
  149. #define __PTR_TO_INT(P) ((int)(P))
  150. #undef  __INT_TO_PTR
  151. #define __INT_TO_PTR(P) ((char *)(P))
  152. #endif
  153.  
  154. #ifndef __LINE__
  155. #define __LINE__ "unknown"
  156. #endif /* __LINE__ */
  157.  
  158. #ifndef __FILE__
  159. #define __FILE__ "unknown"
  160. #endif /* __FILE__ */
  161.  
  162. #ifndef __STDC__
  163. #ifndef const
  164. #define const
  165. #endif
  166. #ifndef volatile
  167. #define volatile
  168. #endif
  169. #endif /* ! __STDC__ */
  170.  
  171. #if !defined (__GNUC__) && !defined (inline)
  172. #define inline
  173. #endif
  174.  
  175. #ifndef FOPEN_WB
  176. #ifdef GO32
  177. #include "fopen-bin.h"
  178. #else
  179. #include "fopen-same.h"
  180. #endif
  181. #endif
  182.  
  183. #ifndef EXIT_SUCCESS
  184. #define EXIT_SUCCESS 0
  185. #define EXIT_FAILURE 1
  186. #endif
  187.  
  188. #define obstack_chunk_alloc xmalloc
  189. #define obstack_chunk_free xfree
  190.  
  191. #define xfree free
  192.  
  193. #define BAD_CASE(val) \
  194. { \
  195.       as_fatal("Case value %ld unexpected at line %d of file \"%s\"\n", \
  196.            (long) val, __LINE__, __FILE__); \
  197.        }
  198.  
  199. /* Version 2.1 of Solaris had problems with this declaration, but I
  200.    think that bug has since been fixed.  If it causes problems on your
  201.    system, just delete it.  */
  202. extern char *strstr ();
  203.  
  204. #include "flonum.h"
  205.  
  206. /* These are assembler-wide concepts */
  207.  
  208. #ifdef BFD_ASSEMBLER
  209. extern bfd *stdoutput;
  210. typedef bfd_vma addressT;
  211. typedef bfd_signed_vma offsetT;
  212. #else
  213. typedef unsigned long addressT;
  214. typedef long offsetT;
  215. #endif
  216.  
  217. /* Type of symbol value, etc.  For use in prototypes.  */
  218. typedef addressT valueT;
  219.  
  220. #ifndef COMMON
  221. #ifdef TEST
  222. #define COMMON            /* declare our COMMONs storage here. */
  223. #else
  224. #define COMMON extern        /* our commons live elswhere */
  225. #endif
  226. #endif
  227. /* COMMON now defined */
  228.  
  229. #ifdef DEBUG
  230. #ifndef know
  231. #define know(p) assert(p)    /* Verify our assumptions! */
  232. #endif /* not yet defined */
  233. #else
  234. #define know(p)            /* know() checks are no-op.ed */
  235. #endif
  236.  
  237. /* input_scrub.c */
  238.  
  239. /*
  240.  * Supplies sanitised buffers to read.c.
  241.  * Also understands printing line-number part of error messages.
  242.  */
  243.  
  244.  
  245. /* subsegs.c     Sub-segments. Also, segment(=expression type)s.*/
  246.  
  247. #ifndef BFD_ASSEMBLER
  248.  
  249. #ifdef MANY_SEGMENTS
  250. #include "bfd.h"
  251. #define N_SEGMENTS 10
  252. #define SEG_NORMAL(x) ((x) >= SEG_E0 && (x) <= SEG_E9)
  253. #define SEG_LIST SEG_E0,SEG_E1,SEG_E2,SEG_E3,SEG_E4,SEG_E5,SEG_E6,SEG_E7,SEG_E8,SEG_E9
  254. #define SEG_TEXT SEG_E0
  255. #define SEG_DATA SEG_E1
  256. #define SEG_BSS SEG_E2
  257. #else
  258. #define N_SEGMENTS 3
  259. #define SEG_NORMAL(x) ((x) == SEG_TEXT || (x) == SEG_DATA || (x) == SEG_BSS)
  260. #define SEG_LIST SEG_TEXT,SEG_DATA,SEG_BSS
  261. #endif
  262.  
  263. typedef enum _segT
  264.   {
  265.     SEG_ABSOLUTE = 0,
  266.     SEG_LIST,
  267.     SEG_UNKNOWN,
  268.     SEG_GOOF,            /* Only happens if AS has a logic error. */
  269.     /* Invented so we don't crash printing */
  270.     /* error message involving weird segment. */
  271.     SEG_EXPR,            /* Intermediate expression values. */
  272.     SEG_DEBUG,            /* Debug segment */
  273.     SEG_NTV,            /* Transfert vector preload segment */
  274.     SEG_PTV,            /* Transfert vector postload segment */
  275.     SEG_REGISTER        /* Mythical: a register-valued expression */
  276.   } segT;
  277.  
  278. #define SEG_MAXIMUM_ORDINAL (SEG_REGISTER)
  279. #else
  280. typedef asection *segT;
  281. #define SEG_NORMAL(SEG)        ((SEG) != absolute_section    \
  282.                  && (SEG) != undefined_section    \
  283.                  && (SEG) != reg_section    \
  284.                  && (SEG) != expr_section)
  285. #endif
  286. typedef int subsegT;
  287.  
  288. /* What subseg we are accreting now? */
  289. COMMON subsegT now_subseg;
  290.  
  291. /* Segment our instructions emit to. */
  292. COMMON segT now_seg;
  293.  
  294. #ifdef BFD_ASSEMBLER
  295. #define segment_name(SEG)    bfd_get_section_name (stdoutput, SEG)
  296. #else
  297. extern char *const seg_name[];
  298. #define segment_name(SEG)    seg_name[(int) (SEG)]
  299. #endif
  300.  
  301. #ifndef BFD_ASSEMBLER
  302. extern int section_alignment[];
  303. #endif
  304.  
  305. #ifdef BFD_ASSEMBLER
  306. extern segT reg_section, expr_section;
  307. /* Shouldn't these be eliminated someday?  */
  308. extern segT text_section, data_section, bss_section;
  309. #define absolute_section    bfd_abs_section_ptr
  310. #define undefined_section    bfd_und_section_ptr
  311. #else
  312. #define reg_section        SEG_REGISTER
  313. #define expr_section        SEG_EXPR
  314. #define text_section        SEG_TEXT
  315. #define data_section        SEG_DATA
  316. #define bss_section        SEG_BSS
  317. #define absolute_section    SEG_ABSOLUTE
  318. #define undefined_section    SEG_UNKNOWN
  319. #endif
  320.  
  321. /* relax() */
  322.  
  323. typedef enum _relax_state
  324.   {
  325.     /* Variable chars to be repeated fr_offset times.
  326.        Fr_symbol unused. Used with fr_offset == 0 for a
  327.        constant length frag. */
  328.     rs_fill = 1,
  329.  
  330.     /* Align: Fr_offset: power of 2.  Variable chars: fill pattern. */
  331.     rs_align,
  332.  
  333.     /* Org: Fr_offset, fr_symbol: address. 1 variable char: fill
  334.        character. */
  335.     rs_org,
  336.  
  337.     rs_machine_dependent
  338.  
  339. #ifndef WORKING_DOT_WORD
  340.     /* JF: gunpoint */
  341.       , rs_broken_word
  342. #endif
  343.   } relax_stateT;
  344.  
  345. /* typedef unsigned char relax_substateT; */
  346. /* JF this is more likely to leave the end of a struct frag on an align
  347.    boundry.  Be very careful with this.  */
  348. typedef unsigned long relax_substateT;
  349.  
  350. /* Enough bits for address, but still an integer type.
  351.    Could be a problem, cross-assembling for 64-bit machines.  */
  352. typedef addressT relax_addressT;
  353.  
  354.  
  355. /* frags.c */
  356.  
  357. /*
  358.  * A code fragment (frag) is some known number of chars, followed by some
  359.  * unknown number of chars. Typically the unknown number of chars is an
  360.  * instruction address whose size is yet unknown. We always know the greatest
  361.  * possible size the unknown number of chars may become, and reserve that
  362.  * much room at the end of the frag.
  363.  * Once created, frags do not change address during assembly.
  364.  * We chain the frags in (a) forward-linked list(s). The object-file address
  365.  * of the 1st char of a frag is generally not known until after relax().
  366.  * Many things at assembly time describe an address by {object-file-address
  367.  * of a particular frag}+offset.
  368.  
  369.  BUG: it may be smarter to have a single pointer off to various different
  370.  notes for different frag kinds. See how code pans
  371.  */
  372. struct frag
  373. {
  374.   /* Object file address. */
  375.   addressT fr_address;
  376.   /* Chain forward; ascending address order.  Rooted in frch_root. */
  377.   struct frag *fr_next;
  378.  
  379.   /* (Fixed) number of chars we know we have.  May be 0. */
  380.   offsetT fr_fix;
  381.   /* (Variable) number of chars after above.  May be 0. */
  382.   offsetT fr_var;
  383.   /* For variable-length tail. */
  384.   struct symbol *fr_symbol;
  385.   /* For variable-length tail. */
  386.   offsetT fr_offset;
  387.   /* Points to opcode low addr byte, for relaxation.  */
  388.   char *fr_opcode;
  389.  
  390. #ifndef NO_LISTING
  391.   struct list_info_struct *line;
  392. #endif
  393.  
  394.   /* What state is my tail in? */
  395.   relax_stateT fr_type;
  396.   relax_substateT fr_subtype;
  397.  
  398.   /* These are needed only on the NS32K machines.  But since we don't
  399.      include targ-cpu.h until after this structure has been defined,
  400.      we can't really conditionalize it.  This code should be
  401.      rearranged a bit to make that possible.
  402.  
  403.      In the meantime, if we get stuck like this with any other target,
  404.      create a union here.  */
  405.   char fr_pcrel_adjust, fr_bsr;
  406.  
  407.   /* Data begins here.  */
  408.   char fr_literal[1];
  409. };
  410.  
  411. #define SIZEOF_STRUCT_FRAG \
  412. ((char *)zero_address_frag.fr_literal-(char *)&zero_address_frag)
  413. /* We want to say fr_literal[0] above. */
  414.  
  415. typedef struct frag fragS;
  416.  
  417. /* Current frag we are building.  This frag is incomplete.  It is, however,
  418.    included in frchain_now.  The fr_fix field is bogus; instead, use:
  419.    obstack_next_free(&frags)-frag_now->fr_literal.  */
  420. COMMON fragS *frag_now;
  421. #define frag_now_fix() ((char*)obstack_next_free (&frags) - frag_now->fr_literal)
  422.  
  423. /* For foreign-segment symbol fixups. */
  424. COMMON fragS zero_address_frag;
  425. /* For local common (N_BSS segment) fixups. */
  426. COMMON fragS bss_address_frag;
  427.  
  428. /* main program "as.c" (command arguments etc) */
  429.  
  430. COMMON unsigned char flag_no_comments; /* -f */
  431. COMMON unsigned char flag_debug; /* -D */
  432. COMMON unsigned char flag_signed_overflow_ok; /* -J */
  433. COMMON unsigned char flag_warn_displacement; /* -K */
  434.  
  435. /* True if local symbols should be retained.  */
  436. COMMON unsigned char flag_keep_locals; /* -L */
  437.  
  438. /* Should the data section be made read-only and appended to the text
  439.    section?  */
  440. COMMON unsigned char flag_readonly_data_in_text; /* -R */
  441.  
  442. /* True if warnings should be inhibited.  */
  443. COMMON unsigned char flag_no_warnings; /* -W */
  444.  
  445. /* True if we should attempt to generate output even if non-fatal errors
  446.    are detected.  */
  447. COMMON unsigned char flag_always_generate_output; /* -Z */
  448.  
  449. /* This is true if the assembler should output time and space usage. */
  450.  
  451. COMMON unsigned char flag_print_statistics;
  452.  
  453. /* name of emitted object file */
  454. COMMON char *out_file_name;
  455.  
  456. /* TRUE if we need a second pass. */
  457. COMMON int need_pass_2;
  458.  
  459. /* TRUE if we should do no relaxing, and
  460.    leave lots of padding.  */
  461. COMMON int linkrelax;
  462.  
  463. /* TRUE if we should produce a listing.  */
  464. extern int listing;
  465.  
  466. struct _pseudo_type
  467.   {
  468.     /* assembler mnemonic, lower case, no '.' */
  469.     char *poc_name;
  470.     /* Do the work */
  471.     void (*poc_handler) PARAMS ((int));
  472.     /* Value to pass to handler */
  473.     int poc_val;
  474.   };
  475.  
  476. typedef struct _pseudo_type pseudo_typeS;
  477.  
  478. #ifdef BFD_ASSEMBLER_xxx
  479. struct lineno_struct
  480.   {
  481.     alent line;
  482.     fragS *frag;
  483.     struct lineno_struct *next;
  484.   };
  485. typedef struct lineno_struct lineno;
  486. #endif
  487.  
  488. /* Prefer varargs for non-ANSI compiler, since some will barf if the
  489.    ellipsis definition is used with a no-arguments declaration.  */
  490. #if defined (HAVE_VARARGS_H) && !defined (__STDC__)
  491. #undef HAVE_STDARG_H
  492. #endif
  493.  
  494. #if defined (HAVE_STDARG_H)
  495. #define USE_STDARG
  496. #endif
  497. #if !defined (USE_STDARG) && defined (HAVE_VARARGS_H)
  498. #define USE_VARARGS
  499. #endif
  500.  
  501. #ifdef USE_STDARG
  502. #if __GNUC__ >= 2
  503. /* for use with -Wformat */
  504. #define PRINTF_LIKE(FCN)    void FCN (const char *format, ...) \
  505.                     __attribute__ ((format (printf, 1, 2)))
  506. #define PRINTF_WHERE_LIKE(FCN)    void FCN (char *file, unsigned int line, \
  507.                       const char *format, ...) \
  508.                     __attribute__ ((format (printf, 3, 4)))
  509. #else /* ANSI C with stdarg, but not GNU C */
  510. #define PRINTF_LIKE(FCN)    void FCN PARAMS ((const char *format, ...))
  511. #define PRINTF_WHERE_LIKE(FCN)    void FCN PARAMS ((char *file, \
  512.                           unsigned int line, \
  513.                             const char *format, ...))
  514. #endif
  515. #else /* not using stdarg */
  516. #define PRINTF_LIKE(FCN)    void FCN ()
  517. #define PRINTF_WHERE_LIKE(FCN)    void FCN ()
  518. #endif
  519.  
  520. PRINTF_LIKE (as_bad);
  521. PRINTF_LIKE (as_fatal);
  522. PRINTF_LIKE (as_tsktsk);
  523. PRINTF_LIKE (as_warn);
  524. PRINTF_WHERE_LIKE (as_bad_where);
  525. PRINTF_WHERE_LIKE (as_warn_where);
  526.  
  527. void fprint_value PARAMS ((FILE *file, addressT value));
  528. void sprint_value PARAMS ((char *buf, addressT value));
  529.  
  530. int had_errors PARAMS ((void));
  531. int had_warnings PARAMS ((void));
  532.  
  533. void print_version_id PARAMS ((void));
  534. char *app_push PARAMS ((void));
  535. char *atof_ieee PARAMS ((char *str, int what_kind, LITTLENUM_TYPE * words));
  536. char *input_scrub_include_file PARAMS ((char *filename, char *position));
  537. char *input_scrub_new_file PARAMS ((char *filename));
  538. char *input_scrub_next_buffer PARAMS ((char **bufp));
  539. PTR xmalloc PARAMS ((unsigned long size));
  540. PTR xrealloc PARAMS ((PTR ptr, unsigned long n));
  541. int do_scrub_next_char PARAMS ((int (*get) (void), void (*unget) (int)));
  542. int gen_to_words PARAMS ((LITTLENUM_TYPE * words, int precision,
  543.               long exponent_bits));
  544. int had_err PARAMS ((void));
  545. int ignore_input PARAMS ((void));
  546. int scrub_from_file PARAMS ((void));
  547. int scrub_from_string PARAMS ((void));
  548. int seen_at_least_1_file PARAMS ((void));
  549. void app_pop PARAMS ((char *arg));
  550. void as_howmuch PARAMS ((FILE * stream));
  551. void as_perror PARAMS ((const char *gripe, const char *filename));
  552. void as_where PARAMS ((char **namep, unsigned int *linep));
  553. void bump_line_counters PARAMS ((void));
  554. void do_scrub_begin PARAMS ((void));
  555. void input_scrub_begin PARAMS ((void));
  556. void input_scrub_close PARAMS ((void));
  557. void input_scrub_end PARAMS ((void));
  558. void new_logical_line PARAMS ((char *fname, int line_number));
  559. void scrub_to_file PARAMS ((int ch));
  560. void scrub_to_string PARAMS ((int ch));
  561. void subsegs_begin PARAMS ((void));
  562. void subseg_change PARAMS ((segT seg, int subseg));
  563. segT subseg_new PARAMS ((const char *name, subsegT subseg));
  564. segT subseg_force_new PARAMS ((const char *name, subsegT subseg));
  565. void subseg_set PARAMS ((segT seg, subsegT subseg));
  566. #ifdef BFD_ASSEMBLER
  567. segT subseg_get PARAMS ((const char *, int));
  568. #endif
  569.  
  570. struct expressionS;
  571. struct fix;
  572. struct symbol;
  573.  
  574. #ifdef BFD_ASSEMBLER
  575. /* literal.c */
  576. valueT add_to_literal_pool PARAMS ((struct symbol *, valueT, segT, int));
  577. #endif
  578.  
  579. #include "expr.h"        /* Before targ-*.h */
  580.  
  581. /* this one starts the chain of target dependant headers */
  582. #include "targ-env.h"
  583.  
  584. #include "struc-symbol.h"
  585. #include "write.h"
  586. #include "frags.h"
  587. #include "hash.h"
  588. #include "read.h"
  589. #include "symbols.h"
  590.  
  591. #include "tc.h"
  592. #include "obj.h"
  593.  
  594. #include "listing.h"
  595.  
  596. #ifdef BFD_ASSEMBLER
  597. /* Someday perhaps this will be selectable at run-time.  */
  598. #if defined (OBJ_AOUT) || defined (OBJ_BOUT)
  599. #define OUTPUT_FLAVOR bfd_target_aout_flavour
  600. #endif
  601. #ifdef OBJ_COFF
  602. #define OUTPUT_FLAVOR bfd_target_coff_flavour
  603. #endif
  604. #ifdef OBJ_ECOFF
  605. #define OUTPUT_FLAVOR bfd_target_ecoff_flavour
  606. #endif
  607. #ifdef OBJ_ELF
  608. #define OUTPUT_FLAVOR bfd_target_elf_flavour
  609. #endif
  610. #endif /* BFD_ASSEMBLER */
  611.  
  612. #endif /* GAS */
  613.  
  614. /* end of as.h */
  615.